home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Turnbull China Bikeride
/
Turnbull China Bikeride - Disc 2.iso
/
BARNET
/
COMPILER
/
SATHER
/
!Sather
/
Library
/
IO
/
config
/
file
next >
Wrap
Text File
|
1996-01-17
|
727b
|
35 lines
#ifndef FILE_CONFIG
#define FILE_CONFIG
#ifdef PP
#undef PP
#endif
#ifdef APP
#undef APP
#endif
#ifdef FPP
#undef FPP
#endif
#ifdef VSTD
#undef VSTD
#endif
#define PP no_pre,no_post
#define VPP volatile,PP
#define VSTD var "@r $$;"
#define IST declare "#include <stdio.h>"
FILE_STDIN: PP,IST,exec "stdin";
FILE_STDOUT: PP,IST,exec "stdout";
FILE_STDERR: PP,IST,exec "stderr";
FILE_CLEAR: VPP,IST,exec "clearerr((FILE *)$0);";
FILE_FWRITE_FSTR: VPP,IST,VSTD,exec "$$=fwrite(((@1)$1)->arr_part,$2,1,$3);" "$$",
f_exec "$$=p_fwrite(((@1)$1)->arr_part,$2,1,$3);" "$$";
FILE_FWRITE_STR: VPP,IST,VSTD,exec "$$=fwrite(((@1)$1)->arr_part,$2,1,$3);" "$$",
f_exec "$$=p_fwrite(((@1)$1)->arr_part,$2,1,$3);" "$$";
#endif